<?php
 If (!IsSet ($reentrance))
  {
   Session_Start () ;
   $_SESSION ["repertoire_config"] = "../../include" ;
   Include ("../../include/garennes.cfg") ;
   Include ("../../include/init.php") ;
   Include ("../include/config.inc") ;
   verif_droits ($droit_courant, $_SESSION ["code"]) ;
  }
 
 $action = var_courante ("action", 0, null) ;
 $millesime = millesime (0) ;
 
 If (IsSet ($action) And ($action > 0))
  {
   //echo $texte."<BR>" ;
   $test = $texte ;
   $tempo = "" ;
   While ($f = StrPos ($test, "/images/themes/fckeditor/"))
    {
     $d = StrPos ($test, "src=") ;
     $t = SubStr ($test, $d, $f-$d+25) ;
     //echo "->(".$d."-".$f.")".$t."<-" ;
     $tempo .= SubStr ($test, 0, $d+6)."../..".SubStr ($test, $f, 25) ;
     $test = SubStr ($test, $f+25, StrLen ($test)-$f-25) ;
     //echo $test."<BR>" ;
    }
   $tempo .= SubStr ($test, 0, StrLen ($test)) ;
   $texte = $tempo ;
   Switch ($action)
    {
     // Nouvelle composition
     Case 1 : $date_debut = $annee_debut."-".$mois_debut."-".$jour_debut ;
              $date_fin = $annee_fin."-".$mois_fin."-".$jour_fin ;
              $ok = SQL_commande ("INSERT INTO messages (id_message,titre,date_message,date_debut,date_fin,contenu,emetteur_type,emetteur_utilisateur)
                                   VALUES ('','".filtrage ($titre)."','".Date ("Y-m-d")."','".$date_debut."','".$date_fin."','".filtrage ($texte)."','".$emetteur_type."','".$emetteur_utilisateur."')",$id_sql) ;
              $res = SQL_commande ("SELECT id_message FROM messages WHERE titre='".$titre."' AND date_debut='".$date_debut."' AND date_fin='".$date_fin."'
                                                       AND emetteur_type='".$emetteur_type."' AND emetteur_utilisateur='".$emetteur_utilisateur."' LIMIT 1", $id_sql) ;
              If (SQL_nbr_lignes ($res) == 1)
               {
                $r = SQL_ligne_suivante ($res) ;
                For ($i = 0 ; $i < $nbr_recepteur_type ; $i++)
                 {
                  $rt = "\$recepteur_type_".$i ; Eval ("\$rt=\"$rt\";") ;
                  If ($rt)
                   {
                    $ok = SQL_commande ("INSERT INTO messages_recepteurs (id_message_recepteur,id_message,recepteur_type,recepteur_groupe,recepteur_utilisateur)
           	                         VALUES ('','".$r [0]."','".$rt."','".$recepteur_groupe."','".$recepteur_utilisateur."')", $id_sql) ;
                   }
                 }
                $message = "Message enregistr&eacute;." ;
               }
              Else { $message = "Probl&egrave;me d'enregistrement du message." ; }
	      $action = 1 ;
	      Break ;
     // Suppression
     Case 2 : $ok = SQL_commande ("DELETE FROM messages_recepteurs WHERE id_message='".$id_message."'", $id_sql) ;
              $ok = SQL_commande ("DELETE FROM messages WHERE id_message='".$id_message."' LIMIT 1", $id_sql) ;
              $message = "Suppression du message effectu&eacute;." ;
	      $action = 1 ;
              Break ;
     // Debut modification
     Case 3 : $res = SQL_commande ("SELECT * FROM messages WHERE id_message='".$id_message."' LIMIT 1", $id_sql) ;
              $modif = SQL_tableau_associatif ($res, "") ;
	      $action = 3 ;
              Break ;
     // Fin modification
     Case 4 : $date_debut = $annee_debut."-".$mois_debut."-".$jour_debut ;
              $date_fin = $annee_fin."-".$mois_fin."-".$jour_fin ;
              $ok = SQL_commande ("UPDATE messages SET titre='".filtrage ($titre)."',date_message='".Date ("Y-m-d")."',date_debut='".$date_debut."',
                                                       date_fin='".$date_fin."',contenu='".filtrage ($texte)."'
				    WHERE id_message='".$id_message."' LIMIT 1", $id_sql) ;
              For ($i = 0 ; $i < $nbr_recepteur_type ; $i++)
               {
	        $rt = "\$recepteur_type_".$i ; Eval ("\$rt=\"$rt\";") ;
                $id_rt = "\$id_message_recepteur_".$i ; Eval ("\$id_rt=\"$id_rt\";") ;
		If ($rt == 0)
		 {
		  // Non coche
		  If ($id_rt !== 0)
		   {
		    // Effacement du recepteur en trop
		    $ok = SQL_commande ("DELETE FROM messages_recepteurs WHERE id_message_recepteur='".$id_rt."' LIMIT 1", $id_sql) ;
		   }
		 }
		Else
		 {
		  // Coche
		  If ($id_rt == 0)
		   {
		    // Ajout d'un nouveau recepteur
		    $ok = SQL_commande ("INSERT INTO messages_recepteurs (id_message_recepteur,id_message,recepteur_type,recepteur_groupe,recepteur_utilisateur)
           	                         VALUES ('','".$id_message."','".$rt."','".$recepteur_groupe."','".$recepteur_utilisateur."')", $id_sql) ;
		   }
		 }
               }
              $message = "Message modifi&eacute;." ;
	      $action = 1 ;
              Break ;
    }
  }
 
 If ((IsSet ($action) And ($action != 3)) Or (!IsSet ($action)))
  {
   $modif ["id_message"] = 0 ;
   $modif ["titre"] = "" ;
   $modif ["date_debut"] = Date ("Y-m-d") ;
   $modif ["date_fin"] = Date ("Y-m-d") ;
   $modif ["contenu"] = "" ;
  }

 $id_utilisateur = utilparcode ($_SESSION ["code"]) ;
 $param_theme = parametres_theme (themeparsession ($_SESSION ["code"])) ;
 $rep_themes = "../../images/themes/" ;
 Include ($rep_themes.$param_theme ["nom_repertoire"]."/".$param_theme ["fichier_config"]) ;
 
 Echo "<HTML><HEAD>" ;
 entete_html ("Garennes", "", 1) ;
 Echo styles ("none", "none", "none", $theme [0][32], "none") ;
 Include ("./carnet_correspondance.js") ;
 Echo "</HEAD>" ;
 
 $resultats = SQL_commande ("SELECT * FROM gestion LIMIT 1", $id_sql) ;
 $gestion = SQL_tableau_associatif ($resultats, "") ;
 
 Echo "<BODY BACKGROUND=\"".$rep_themes.$param_theme ["nom_repertoire"]."/".$theme [9][10]."\" onContextMenu=\"return false\">" ;
 Echo "<CENTER>Carnet de correspondance</CENTER>" ;
 If (IsSet ($message)) { Echo "<CENTER><FONT COLOR=\"#FF0000\"><B>".$message."</B></FONT></CENTER>" ; }
 // Liste des messages personnels
 $titre_fenetre = "Vos messages..." ;
 $resultats = SQL_commande ("SELECT id_message,titre,date_message,date_debut,date_fin FROM messages
                              WHERE emetteur_type='".$droit_courant."' AND emetteur_utilisateur='".$id_utilisateur."' ORDER BY date_message DESC,contenu ASC", $id_sql) ;
 If (SQL_nbr_lignes ($resultats) > 0)
  {
   Echo "<FORM ACTION=\"./carnet_correspondance.php\" MTHOD=\"POST\" NAME=\"suppression\">" ;
   Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"id_message\" VALUE=\"0\">" ;
   Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"action\" VALUE=\"2\">" ;
   Echo "</FORM>" ;
   Echo "<TABLE BORDER=\"0\" ALIGN=\"CENTER\" CELLSPACING=\"0\" CELLPADDING=\"0\" STYLE=\"border-collapase:collapse\">" ;
   Echo "<TR><TD VALIGN=\"TOP\">" ;
   Include ("../include/debut_theme.inc") ;
   Echo "<TABLE BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"0\" WIDTH=\"100%\">" ;
   For ($i = 0 ; $i < SQL_nbr_lignes ($resultats) ; $i++)
    {
     $ligne = SQL_ligne_suivante ($resultats) ;
     Echo "<TR" ;
     If ($i%$theme [10][0] == 1) { Echo " BGCOLOR=\"".$theme [10][2]."\"" ; }
     Echo "><TD VALIGN=\"MIDDLE\"><A HREF=\"./carnet_correspondance.php?action=3&id_message=".$ligne [0]."\"><IMG SRC=\"../images/edition.png\" BORDER=\"0\" TITLE=\"Modifier...\"></A>" ;
     Echo "<A HREF=\"javascript:valider_effacement('".Str_Replace ("'", "\'", $ligne [1])."','".decode_date_3 ($ligne [2])."','".decode_date_3 ($ligne [3])."','".decode_date_3 ($ligne [4])."','".$ligne [0]."')\">" ;
     Echo "<IMG SRC=\"../images/effacer.png\" BORDER=\"0\" TITLE=\"Supprimer...\"></A>&nbsp;</TD>" ;
     Echo "<TD><FONT SIZE=\"-2\"><B>&nbsp;".Str_Replace (" ", "&nbsp;", $ligne [1])."&nbsp;</B></FONT>" ;
     //Echo "<BR><FONT SIZE=\"-2\">&nbsp;".Str_Replace (" ", "&nbsp;", decode_date_3 ($ligne [2]))."&nbsp;</FONT>" ;
     Echo "<BR><FONT SIZE=\"-3\">&nbsp;Affich&eacute;&nbsp;du&nbsp;".decode_date_3 ($ligne [3])."&nbsp;au&nbsp;".decode_date_3 ($ligne [4])."&nbsp;</FONT>" ;
     $rs = SQL_commande ("SELECT g.nom FROM type_groupe_utilisateurs g,messages_recepteurs r WHERE r.id_message='".$ligne [0]."' AND r.recepteur_type=g.id_type_groupe_utilisateur ORDER BY g.nom", $id_sql) ;
     If (SQL_nbr_lignes ($rs) > 0)
      {
       Echo "<BR><FONT SIZE=\"-3\">&nbsp;Destinataire" ; If (SQL_nbr_lignes ($rs) > 0) { Echo "s" ; }
       Echo "&nbsp;:&nbsp;<I>" ;
       For ($j = 0 ; $j < SQL_nbr_lignes ($rs) ; $j++)
        {
	 $l = SQL_ligne_suivante ($rs) ;
	 Echo $l [0] ;
	 If ($j < SQL_nbr_lignes ($rs)-1) { Echo "," ; }
	 Echo "&nbsp;" ;
	}
       Echo "</I></FONT>" ;
      }
     Echo "</TD></TR>" ;
    }
   Echo "</TABLE>" ;
   Include ("../include/fin_theme.inc") ;
  }
 Else
  {
   Echo "<TABLE BORDER=\"0\" ALIGN=\"CENTER\" CELLSPACING=\"0\" CELLPADDING=\"0\" STYLE=\"border-collapase:collapse\">" ;
   Echo "<TR><TD VALIGN=\"TOP\">" ;
   Include ("../include/debut_theme.inc") ;
   Echo "<TABLE BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"0\" WIDTH=\"100%\"><TR><TD>Aucun&nbsp;message.</TD></TR></TABLE>" ;
   Include ("../include/fin_theme.inc") ;
  }
 Echo "</TD>" ;
 
 Echo "<TD>&nbsp;</TD>" ;
 
 Echo "<TD VALIGN=\"TOP\">" ;
 // Fenetre de composition/modification
 //If ($droit_courant == $droit_prof) { $fontes = "<FONT SIZE=\"".$theme [0][28]."\">" ; } Else { $fontes = "<FONT SIZE=\"".$l ["titre"]."\">" ; }
 $fontes = "<FONT SIZE=\"".$theme [0][28]."\">" ;
 If ($modif ["id_message"] == 0) { $titre_fenetre = "Composition..." ; } Else { $titre_fenetre = "Modification d'un message..." ; }
 $non_centrer = 0 ;
 Echo "<FORM ACTION=\"./carnet_correspondance.php\" METHOD=\"POST\" NAME=\"messagerie\" onSubmit=\"return valide_saisie()\">" ;
 Include ("../include/debut_theme.inc") ;
 Echo "<TABLE BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"0\" WIDTH=\"100%\">" ;
 Echo "<TR><TD COLSPAN=\"3\" HEIGHT=\"10\"></TD></TR>" ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."Titre&nbsp;:&nbsp;</FONT></TD>" ;
 Echo "<TD COLSPAN=\"2\">".$fontes."<INPUT TYPE=\"TEXT\" NAME=\"titre\" VALUE=\"".$modif ["titre"]."\" MAXLENGTH=\"49\" SIZE=\"50\">&nbsp;</FONT></TD></TR>" ;
 Echo "<TR><TD COLSPAN=\"3\" HEIGHT=\"10\"></TD></TR>" ;
 $dd = Explode ("-", $modif ["date_debut"]) ;
 $jour_courant = $dd [2] ;
 $mois_courant = $dd [1] ;
 $annee_courant = $dd [0] ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."Affich&eacute;&nbsp;du&nbsp;</FONT></TD><TD COLSPAN=\"2\">".saisie_date ($jour_courant,$mois_courant,$annee_courant,Date ("Y")-1,3,"jour_debut","mois_debut","annee_debut")."&nbsp;</FONT></TD></TR>" ;
 $dd = Explode ("-", $modif ["date_fin"]) ;
 $jour_courant = $dd [2] ;
 $mois_courant = $dd [1] ;
 $annee_courant = $dd [0] ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."au&nbsp;</FONT></TD><TD COLSPAN=\"2\">".saisie_date ($jour_courant,$mois_courant,$annee_courant,Date ("Y")-1,3,"jour_fin","mois_fin","annee_fin")."&nbsp;</FONT></TD></TR>" ;
 Echo "<TR><TD COLSPAN=\"3\" HEIGHT=\"10\"></TD></TR>" ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."Destinataire&nbsp;:&nbsp;</FONT></TD>" ;
 $res = SQL_commande ("SELECT id_type_groupe_utilisateur,nom,defaut FROM type_groupe_utilisateurs WHERE actif='1' ORDER BY nom", $id_sql) ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"nbr_recepteur_type\" VALUE=\"".SQL_nbr_lignes ($res)."\">" ;
 For ($i = 0 ; $i < SQL_nbr_lignes ($res) ; $i++)
  {
   $r = SQL_ligne_suivante ($res) ;
   If (($i%2 == 0) And ($i > 1)) { Echo "</TR><TR><TD></TD>" ; }
   Echo "<TD>".$fontes."<INPUT TYPE=\"CHECKBOX\" NAME=\"recepteur_type_".$i."\" VALUE=\"".$r [0]."\"" ;
   If ($modif ["id_message"] != 0)
    {
     $recepteur = SQL_commande ("SELECT id_message_recepteur FROM messages_recepteurs WHERE id_message='".$modif ["id_message"]."' AND recepteur_type='".$r [0]."' LIMIT 1", $id_sql) ;
     If (SQL_nbr_lignes ($recepteur) == 1) { Echo " CHECKED" ; $rcp = SQL_ligne_suivante ($recepteur) ; } Else { $rcp [0] = 0 ; }
     Echo ">".$r [1]."&nbsp;<INPUT TYPE=\"HIDDEN\" NAME=\"id_message_recepteur_".$i."\" VALUE=\"".$rcp [0]."\"></FONT></TD>" ;
    }
   Else
    {
     If ($r [2] == 1) { Echo " CHECKED" ; }
     Echo ">".$r [1]."&nbsp;<INPUT TYPE=\"HIDDEN\" NAME=\"id_message_recepteur_".$i."\" VALUE=\"0\"></FONT></TD>" ;
    }
  }
 Echo "</TR>" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"recepteur_groupe\" VALUE=\"0\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"recepteur_utilisateur\" VALUE=\"0\">" ;
 Echo "<TR><TD COLSPAN=\"3\" VALIGN=\"TOP\" WIDTH=\"100%\">" ;
 Echo active_editeur ("100","100%","Simple",$param_theme ["nom_repertoire"],$modif ["contenu"]) ;
 Echo "</TD></TR>" ;
 Echo "<TR><TD COLSPAN=\"3\" ALIGN=\"CENTER\"><INPUT TYPE=\"IMAGE\" SRC=\"" ;
 If ($droit_courant != $droit_prof) { Echo "../images/valider.png" ; }
 Else { Echo $rep_themes.$param_theme ["nom_repertoire"]."/".$theme [9][0] ; }
 Echo "\" NAME=\"submit\" VALUE=\" Valider le message \" BORDER=\"0\"></TD></TR></TABLE>" ;
 Include ("../include/fin_theme.inc") ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"emetteur_type\" VALUE=\"".$droit_courant."\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"emetteur_utilisateur\" VALUE=\"".$id_utilisateur."\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"id_message\" VALUE=\"".$modif ["id_message"]."\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"action\" VALUE=\"" ;
 If ($modif ["id_message"] == 0) { Echo "1" ; } Else { Echo "4" ; }
 Echo "\">" ;
 Echo "</FORM>" ;
 Echo "</TD></TR><TABLE>" ;
 Echo "</BODY><HTML>" ;
?>